Revista CD Expert 8

home *** CD-ROM | disk | FTP | other *** search

/ Revista CD Expert 8 / Revista CD Expert nº 08 CD1.iso / Utilitarios / Especiais / Hotdog 5.5 / hotdog55install.exe / %MAINDIR% / HotDog5.exe / 0 / RCDATA / TFRMIMAGELAB / TFRMIMAGELAB.txt < prev

Wrap

Text File | 1999-04-29 | 20.7 KB | 800 lines

object frmImageLab: TfrmImageLab Left = 330 Top = 106 Width = 640 Height = 409 BorderIcons = [biSystemMenu, biMaximize] Caption = 'ImageLab' Color = clBtnFace Font.Charset = ANSI_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'Tahoma' Font.Style = [] Icon.Data = {<image000.ico>} OldCreateOrder = True Position = poScreenCenter Scaled = False OnClose = FormClose OnCreate = FormCreate OnResize = FormResize OnShow = FormShow PixelsPerInch = 96 TextHeight = 13 object pnlBottom: TPanel Left = 0 Top = 341 Width = 632 Height = 41 Align = alBottom TabOrder = 0 object lblStatus: TLabel Left = 106 Top = 1 Width = 3 Height = 13 end object btnHelp: TButton Left = 11 Top = 8 Width = 75 Height = 25 Caption = '&Help' TabOrder = 0 OnClick = btnHelpClick end object pnlConvert: TPanel Left = 378 Top = 1 Width = 253 Height = 39 Align = alRight BevelOuter = bvNone TabOrder = 1 object btnSaveAs: TButton Left = 87 Top = 8 Width = 75 Height = 25 Caption = '&Save As' Enabled = False TabOrder = 2 OnClick = btnSaveAsClick end object btnOK: TButton Left = 169 Top = 8 Width = 75 Height = 25 Caption = '&OK' ModalResult = 1 TabOrder = 0 end object btnConvert: TButton Left = 87 Top = 8 Width = 75 Height = 25 HelpContext = 788 Caption = 'Convert >>' TabOrder = 1 OnClick = btnConvertClick end object btnOpen: TButton Left = 6 Top = 8 Width = 75 Height = 25 Caption = 'O&pen' TabOrder = 3 Visible = False OnClick = btnOpenClick end end end object pgMain: TPageControl Left = 0 Top = 0 Width = 632 Height = 291 ActivePage = tsConvert Align = alClient TabOrder = 1 object tsPreview: TTabSheet Caption = 'tsPreview' TabVisible = False object lblPreviewInfo: TLabel Left = 0 Top = 0 Width = 624 Height = 13 Align = alTop Color = clBlack Font.Charset = ANSI_CHARSET Font.Color = clWhite Font.Height = -11 Font.Name = 'Tahoma' Font.Style = [fsBold] ParentColor = False ParentFont = False end object scrPreview: TScrollBox Left = 0 Top = 13 Width = 624 Height = 250 HorzScrollBar.Tracking = True VertScrollBar.Tracking = True Align = alClient TabOrder = 0 object ilPreview: TPMultiImage Left = 132 Top = 112 Width = 105 Height = 105 GrabHandCursor = 5 AutoSize = True Scrolling = True B_W_CopyFlags = [C_DEL] Color = clBtnFace ImageName = 'file not found' ImageReadRes = lAutoMatic BlitMode = sLight ImageWriteRes = sAutoMatic TifSaveCompress = sNONE TiffPage = 1 TiffAppend = False JPegSaveQuality = 25 JPegSaveSmooth = 0 RubberBandBtn = mbLeft ParentColor = True TextLeft = 0 TextTop = 0 TextRotate = 0 TabOrder = 0 TabStop = False ZoomBy = 10 end end end object tsConvert: TTabSheet Caption = 'tsConvert' TabVisible = False object Splitter1: TSplitter Left = 240 Top = 0 Width = 5 Height = 157 Cursor = crHSplit OnMoved = Splitter1Moved end object Panel4: TPanel Left = 0 Top = 157 Width = 624 Height = 106 Align = alBottom BevelOuter = bvNone TabOrder = 0 object pnlJPEGOptions: TPanel Left = 465 Top = 0 Width = 357 Height = 106 Align = alLeft BevelOuter = bvNone TabOrder = 2 Visible = False object Label3: TLabel Left = 8 Top = 72 Width = 61 Height = 13 Caption = 'Compression' end object chkProgressive: TCheckBox Left = 8 Top = 8 Width = 125 Height = 17 Caption = '&Progressive Encoding' TabOrder = 0 OnClick = chkProgressiveClick end object chkSmoothing: TCheckBox Left = 8 Top = 32 Width = 73 Height = 17 Caption = '&Blurring' TabOrder = 1 OnClick = chkSmoothingClick end object tbSmoothing: TTrackBar Left = 84 Top = 28 Width = 228 Height = 33 HelpContext = 810 Enabled = False Max = 20 Orientation = trHorizontal Frequency = 2 Position = 0 SelEnd = 0 SelStart = 0 TabOrder = 2 ThumbLength = 20 TickMarks = tmBottomRight TickStyle = tsAuto OnChange = tbSmoothingChange end object txtSmoothing: TSausEdit Left = 321 Top = 29 Width = 34 Height = 21 Enabled = False MaxLength = 20 TabOrder = 3 OnChange = txtSmoothingChange NumericOnly = True AllowDecimal = False DecimalPlaces = 0 Max = 0 Min = 0 Version = '1.4' FileGlyph = sgOpen RegStore = False end object txtCompression: TSausEdit Left = 321 Top = 77 Width = 34 Height = 21 TabOrder = 4 Text = '80' OnChange = txtCompressionChange NumericOnly = False AllowDecimal = False DecimalPlaces = 0 Max = 100 Min = 1 Version = '1.4' FileGlyph = sgOpen RegStore = False end object tbCompression: TTrackBar Left = 84 Top = 77 Width = 228 Height = 25 HelpContext = 809 Max = 100 Min = 1 Orientation = trHorizontal PageSize = 5 Frequency = 10 Position = 80 SelEnd = 0 SelStart = 0 TabOrder = 5 ThumbLength = 20 TickMarks = tmBottomRight TickStyle = tsAuto OnChange = tbCompressionChange end object chkGreyscale: TCheckBox Left = 154 Top = 8 Width = 71 Height = 17 HelpContext = 811 Caption = '&Grayscale' TabOrder = 6 OnClick = chkProgressiveClick end end object pnlType: TPanel Left = 0 Top = 0 Width = 93 Height = 106 Align = alLeft BevelOuter = bvNone TabOrder = 0 object Bevel1: TBevel Left = 89 Top = 6 Width = 2 Height = 96 end object Bevel2: TBevel Left = 0 Top = 59 Width = 88 Height = 2 end object rbGIF: TRadioButton Left = 7 Top = 64 Width = 46 Height = 18 HelpContext = 791 Caption = '&GIF' Checked = True TabOrder = 0 TabStop = True OnClick = rbGIFClick end object rbJPEG: TRadioButton Left = 7 Top = 86 Width = 46 Height = 17 HelpContext = 792 Caption = '&JPEG' TabOrder = 1 OnClick = rbJPEGClick end object btnGo: TBitBtn Left = 7 Top = 29 Width = 75 Height = 25 HelpContext = 794 Caption = 'Preview' Default = True TabOrder = 2 OnClick = btnGoClick end object chkAutoPreview: TCheckBox Left = 7 Top = 9 Width = 44 Height = 16 HelpContext = 793 Caption = '&Auto' TabOrder = 3 OnClick = chkAutoPreviewClick end end object pnlGIFOptions: TPanel Left = 93 Top = 0 Width = 372 Height = 106 Align = alLeft BevelOuter = bvNone TabOrder = 1 object btnOpenPalette: TSpeedButton Left = 296 Top = 31 Width = 23 Height = 21 Enabled = False Glyph.Data = { 36010000424D3601000000000000760000002800000012000000100000000100 040000000000C0000000120B0000120B00001000000000000000000000000000 80000080000000808000800000008000800080800000C0C0C000808080000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00777777777777 7777770000007777777777777777770077777000000000007777770077777003 3333333307777700700070B03333333330777700700370FB0333333333077700 70B070BFB03333333330770070FB70FBFB0000000000070070BF70BFBFBFBFB0 7777770070FB70FBFBFBFBF07777770070BF70BFB00000007777770070FB7700 077777777000770070BF77777777777777007700770077777777707770707700 7777777777777700077777007777777777777777777777007777} OnClick = btnOpenPaletteClick end object lblMaxColoursHeading: TLabel Left = 189 Top = 83 Width = 57 Height = 13 Caption = 'Max. Colors' Enabled = False end object btnTransparentColourPicker: TSpeedButton Left = 9 Top = 29 Width = 110 Height = 25 AllowAllUp = True GroupIndex = 5 Caption = 'Color Picker' Enabled = False Glyph.Data = { 36010000424D3601000000000000760000002800000012000000100000000100 040000000000C0000000120B0000120B00001000000000000000000000000000 80000080000000808000800000008000800080800000C0C0C000808080000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00770777777777 77777700300070F007777777777777007707770FF07777777777770070F0770F FF07777777777700770F7770FFF0777777777700770F77770FFF077777777700 7770777770FFF0777777770077777777770FFF0777777700777777777770FFF0 707777007777777777770FFF0077770077777777777770F00077770077777777 7777770000007700777777777777700000000700777777777777777700000700 7777777777777777000007007777777777777777700077007777} OnClick = btnTransparentColourPickerClick end object lblTransInst: TLabel Left = 13 Top = 61 Width = 108 Height = 13 Caption = 'Select from new image' Enabled = False end object chkTransparent: TCheckBox Left = 11 Top = 10 Width = 79 Height = 16 HelpContext = 807 Caption = '&Transparent' Enabled = False TabOrder = 0 OnClick = chkTransparentClick end object scpTransparentColour: TSausColourPicker Left = 9 Top = 77 Width = 110 Height = 27 HelpContext = 808 Enabled = False TabOrder = 1 OnChange = scpTransparentColourChange Version = '1.29' Warnings = False end object rbDither: TRadioButton Left = 270 Top = 74 Width = 51 Height = 17 HelpContext = 806 Caption = 'Dither' TabOrder = 4 OnClick = rbDitherClick end object rbFlat: TRadioButton Left = 270 Top = 90 Width = 51 Height = 17 HelpContext = 806 Caption = 'Flat' Checked = True TabOrder = 5 TabStop = True OnClick = rbFlatClick end object chkLoadPalette: TCheckBox Left = 153 Top = 10 Width = 85 Height = 13 HelpContext = 802 Caption = 'Load Palette' TabOrder = 2 OnClick = chkLoadPaletteClick end object cmbPalette: TComboBox Left = 152 Top = 31 Width = 145 Height = 21 HelpContext = 803 Enabled = False ItemHeight = 13 TabOrder = 3 Text = 'cmbPalette' OnClick = cmbPaletteClick end object chkReducePalette: TCheckBox Left = 152 Top = 58 Width = 97 Height = 14 HelpContext = 804 Caption = 'Reduce Palette' TabOrder = 6 OnClick = chkReducePaletteClick end object txtMaxColours: TSausEdit Left = 151 Top = 80 Width = 33 Height = 21 HelpContext = 805 Enabled = False TabOrder = 7 Text = '256' OnChange = txtMaxColoursChange NumericOnly = True AllowDecimal = False DecimalPlaces = 0 Max = 256 Min = 2 Version = '1.4' FileGlyph = sgOpen RegStore = False end end end object pnlSource: TPanel Left = 0 Top = 0 Width = 240 Height = 157 Align = alLeft BevelOuter = bvNone TabOrder = 1 object lblSourceInfo: TLabel Left = 0 Top = 0 Width = 240 Height = 13 Align = alTop Color = clBlack Font.Charset = ANSI_CHARSET Font.Color = clWhite Font.Height = -11 Font.Name = 'Tahoma' Font.Style = [fsBold] ParentColor = False ParentFont = False end object scrSource: TScrollBox Left = 0 Top = 13 Width = 240 Height = 144 HelpContext = 789 HorzScrollBar.Tracking = True VertScrollBar.Tracking = True Align = alClient TabOrder = 0 object imgSource: TImage Left = 0 Top = 2 Width = 245 Height = 127 AutoSize = True Center = True OnMouseDown = imgSourceMouseDown OnMouseMove = imgSourceMouseMove OnMouseUp = imgSourceMouseUp end end end object pnlDest: TPanel Left = 245 Top = 0 Width = 379 Height = 157 Align = alClient BevelOuter = bvNone TabOrder = 2 object lblDestInfo: TLabel Left = 0 Top = 0 Width = 379 Height = 13 Align = alTop Color = clBlack Font.Charset = ANSI_CHARSET Font.Color = clWhite Font.Height = -11 Font.Name = 'Tahoma' Font.Style = [fsBold] ParentColor = False ParentFont = False end object scrDest: TScrollBox Left = 0 Top = 13 Width = 379 Height = 144 HelpContext = 790 HorzScrollBar.Tracking = True VertScrollBar.Tracking = True Align = alClient TabOrder = 0 object imgDest: TImage Left = 0 Top = 0 Width = 158 Height = 126 AutoSize = True Center = True OnMouseDown = imgDestMouseDown OnMouseMove = imgDestMouseMove OnMouseUp = imgDestMouseUp end end end end end object pnlOptions: TPanel Left = 0 Top = 291 Width = 632 Height = 50 Align = alBottom TabOrder = 2 object btnZoom: TSpeedButton Left = 11 Top = 18 Width = 75 Height = 25 AllowAllUp = True GroupIndex = 5 Caption = '&Zoom ' Enabled = False Glyph.Data = { 36010000424D3601000000000000760000002800000012000000100000000100 040000000000C0000000120B0000120B00001000000000000000000000000000 80000080000000808000800000008000800080800000C0C0C000808080000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00777777777777 7770770000007777777777777700070077777777777777777000770077777777 7777777700077700777777777777777000777700777777777000070007777700 777777700FFFF0007777770077777770FFF00F07777777007770770FFFFFF0F0 777777007770770FFFFFF0F077777700770F770FFFFFFFF077777700770F770F FFFFFFF077777700770F7770FFFFFF0777777700770F77700FFFF00777777700 7770777770000777777777007770777777777777777777007777} Visible = False end object pnlResize: TPanel Left = 100 Top = 1 Width = 357 Height = 48 BevelOuter = bvNone TabOrder = 0 Visible = False object Label2: TLabel Left = 304 Top = 25 Width = 12 Height = 13 Caption = 'by' end object lblCrop: TLabel Left = 10 Top = 28 Width = 3 Height = 13 end object lblCrop2: TLabel Left = 60 Top = 5 Width = 3 Height = 13 end object chkCrop: TCheckBox Left = 8 Top = 4 Width = 45 Height = 17 HelpContext = 796 Caption = 'Crop' TabOrder = 0 OnClick = chkCropClick end object chkResize: TCheckBox Left = 151 Top = 4 Width = 51 Height = 17 HelpContext = 797 Caption = 'Resize' TabOrder = 1 OnClick = chkResizeClick end object txtResizeWidth: TSausEdit Left = 267 Top = 22 Width = 34 Height = 21 HelpContext = 798 Enabled = False TabOrder = 4 OnChange = txtResizeHeightChange NumericOnly = True AllowDecimal = False DecimalPlaces = 0 Max = 0 Min = 0 Version = '1.4' FileGlyph = sgOpen RegStore = False end object txtResizeHeight: TSausEdit Left = 318 Top = 22 Width = 34 Height = 21 HelpContext = 799 Enabled = False TabOrder = 5 OnChange = txtResizeHeightChange NumericOnly = True AllowDecimal = False DecimalPlaces = 0 Max = 0 Min = 0 Version = '1.4' FileGlyph = sgOpen RegStore = False end object cmbResizeMethod: TComboBox Left = 151 Top = 22 Width = 100 Height = 21 Style = csDropDownList Enabled = False ItemHeight = 13 TabOrder = 2 OnClick = cmbResizeMethodClick end object chkKeepRatio: TCheckBox Left = 268 Top = 4 Width = 77 Height = 17 HelpContext = 801 Caption = '&Keep Ratio' Enabled = False TabOrder = 3 end end object pnlDownloadTime: TPanel Left = 460 Top = 1 Width = 171 Height = 48 Align = alRight BevelOuter = bvNone TabOrder = 1 object lblDownload: TLabel Left = 8 Top = 5 Width = 130 Height = 13 Caption = 'Download Time (secs):' Font.Charset = ANSI_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'Tahoma' Font.Style = [fsBold] ParentFont = False end object cmbDownloadTime: TComboBox Left = 7 Top = 22 Width = 155 Height = 19 HelpContext = 787 Style = csOwnerDrawFixed ItemHeight = 13 TabOrder = 0 OnDrawItem = cmbDownloadTimeDrawItem end end end object dlgOpenPalette: TOpenDialog Filter = 'pal,act,gif|*.pal;*.act;*.gif|All Files (*.*)|*.*' Left = 457 Top = 10 end object tmrAutoSave: TTimer Enabled = False Interval = 2000 OnTimer = tmrAutoSaveTimer Left = 510 Top = 87 end end